// .txt

beginzonescript;

variables;

short crime_tolerance = 5;
short last_abil;
short i;

body;

beginstate INIT_STATE;

//	set_name(,"");
	add_range_to_group(48,55,7);
	set_name(1007,"Servile Farmer");
	set_courage(1007,0);
	
	if (get_sdf(41,3) > 0) {
		make_zone_hostile();
		}

		set_name(45,"Burrowing Pest");
		set_level(45,20);
		set_name(46,"Burrowing Pest");
		set_level(46,20);
		set_name(47,"Burrowing Pest");
		set_level(47,20);

	set_name(57,"Loyalist Soldier");
	set_level(57,25);
	set_boss_level(57,1);
	set_attack_bonus(57,12);
	set_name(58,"Loyalist Soldier");
	set_level(58,25);
	set_boss_level(58,1);
	set_attack_bonus(58,12);

	set_name(59,"Sage Rudelle");
	set_boss_level(59,1);
	
	
	last_abil = get_current_tick();
	
	set_crime_tolerance(crime_tolerance);
	break;

beginstate EXIT_STATE;

break;

beginstate START_STATE;
	// clear zone?
	//if ((zone_clear(ME) == FALSE) && (get_flag(,) > 0)) {
		//print_str_color("",2);
		//clear_zone(ME);	
		//}
		
	if ((get_crime_level() >= crime_tolerance) && (get_sdf(41,3) == 0)) {
		make_zone_hostile();
		set_flag(41,3,1);
		}

	 if (gf(41,3) == 0) {
		if ((get_ran(1,0,100) < 10) && (gf(40,3) == 0))
			give_char_text_bubble(56,"Curse this goo!");
		if ((get_ran(1,0,100) < 10) && (gf(40,3) == 0))
			give_char_text_bubble(56,"I will never be clean.");
		if ((get_ran(1,0,100) < 10) && (gf(40,3) == 0))
			give_char_text_bubble(56,"Wish I was at the front.");
		if ((get_ran(1,0,100) < 10) && (gf(40,3) == 0))
			give_char_text_bubble(56,"We're wasted here.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(59,"No love charms.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(59,"No minor cures.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(59,"Only real alchemy here.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(59,"I can't cure your ornk.");
		}
	
	//if (((is_combat()) && (tick_difference(last_abil,get_current_tick()) > 0)) || ((is_group()) && (tick_difference(last_abil,get_current_tick()) > 5))) {
	//	last_abil = get_current_tick();
	//	}
	
	if ((gf(40,16) == 0) && (has_spec_item(16) > 0) && (party_near_nav(4,4))) {
		sf(40,16,1);
		if (gf(40,8) == 0)
			sf(40,8,1);

		activate_hidden_group(5);
		add_range_to_group(33,36,5);
		set_name(1005,"Burrowing Pest");
		set_level(1005,18);
		set_new_abil(1005,11);
		
		begin_talk_mode(4);
		}
	
	if ((gf(40,17) == 0) && (has_spec_item(16) > 0) && (party_near_nav(5,4))) {
		sf(40,17,1);
		if (gf(40,8) == 0)
			sf(40,8,1);

		activate_hidden_group(6);
		add_range_to_group(37,40,5);
		set_name(1005,"Burrowing Pest");
		set_level(1005,18);
		set_new_abil(1005,12);
		
		begin_talk_mode(4);
		}
	
	if ((gf(40,18) == 0) && (has_spec_item(16) > 0) && (party_near_nav(6,4))) {
		sf(40,18,1);
		if (gf(40,8) == 0)
			sf(40,8,1);

		activate_hidden_group(7);
		add_range_to_group(41,44,5);
		set_name(1005,"Burrowing Pest");
		set_level(1005,18);
		set_new_abil(1005,12);
		
		begin_talk_mode(4);
		}
break;

beginstate 10;
	set_terrain_string_range("This shop sold food to passing caravans. Generally fish. It is currently closed.",3);
break;

//	print_str("");
//	set_terrain_string_range(".",3);
//	set_terrain_string_range("The sign says - .",3);
